﻿Public Class DocumentoProveedorDetalle

    Dim _CIA, _SUC_Codigo, _TDOC_Codigo, _DCP_Codigo, _DPD_Codigo, _ART_Codigo As String
    Dim _DPD_Cantidad As Integer
    Dim _DPD_Activo As String

    Sub New()

    End Sub

    Sub New(cia As String, suc As String, tdoc As String, codigo As String, detalle As String, articulo As String, cantidad As Integer, activo As String)
        Me._CIA = cia
        Me._SUC_Codigo = suc
        Me._TDOC_Codigo = tdoc
        Me._DCP_Codigo = codigo
        Me._DPD_Codigo = detalle
        Me._ART_Codigo = articulo
        Me._DPD_Cantidad = cantidad
        Me._DPD_Activo = activo
    End Sub

    Public Property CIA() As String
        Get
            Return _CIA
        End Get
        Set(value As String)
            _CIA = value
        End Set
    End Property

    Public Property SUC_Codigo() As String
        Get
            Return _SUC_Codigo
        End Get
        Set(value As String)
            _SUC_Codigo = value
        End Set
    End Property

    Public Property TDOC_Codigo() As String
        Get
            Return _TDOC_Codigo
        End Get
        Set(value As String)
            _TDOC_Codigo = value
        End Set
    End Property

    Public Property DCP_Codigo() As String
        Get
            Return _DCP_Codigo
        End Get
        Set(value As String)
            _DCP_Codigo = value
        End Set
    End Property

    Public Property DPD_Codigo() As String
        Get
            Return _DPD_Codigo
        End Get
        Set(value As String)
            _DPD_Codigo = value
        End Set
    End Property

    Public Property ART_Codigo() As String
        Get
            Return _ART_Codigo
        End Get
        Set(value As String)
            _ART_Codigo = value
        End Set
    End Property

    Public Property DPD_Cantidad() As Integer
        Get
            Return _DPD_Cantidad
        End Get
        Set(value As Integer)
            _DPD_Cantidad = value
        End Set
    End Property

    Public Property DPD_Activo() As String
        Get
            Return _DPD_Activo
        End Get
        Set(value As String)
            _DPD_Activo = value
        End Set
    End Property

End Class
